#'
#' Generate a randomly distributed population with fixed number of individuals
#' 
#' @param species name of the species
#' @param n expected number of individuals
#' @param plotdim the ranges of the plot
#'
#'
#'@return
#' A population object
#'
#'@examples
#'set.seed(1)
#'pop=rpopulation("sp1",88,plotdim=c(10,10))
#'pop
#'plot(pop)
#'
#'
rpopulation=function(species="sp1",n=1000,plotdim=c(100,100)){
  x=runif(n,0,plotdim[1])
  y=runif(n,0,plotdim[2])
  return(population(species=species,x=x,y=y,plotdim=plotdim))
}